home *** CD-ROM | disk | FTP | other *** search
/ PC Users 1999 April / Cd Pc Users extra 19 abril 1999.iso / Prog / Inst / Js02 / js02.exe / js / tickerhor.js < prev   
Encoding:
Text File  |  1999-02-15  |  9.9 KB  |  234 lines
  1. function Create_Ticker(signe_browser,NameId,NumbText,LeftPos,TopPos,TickWidth,TickHeight,LeftLimit,TickStep,TickTime){
  2.  
  3.  
  4.     var meja=null;
  5.     var TickerHor='';
  6.     var TickerHor1='';
  7.     var TickerHor2='';
  8.     var TickerHor3='';
  9.     var TickerHorSelect1='';
  10.     var TickerHorSelect2='';
  11.     var TickerHorNav1='';
  12.     var TickerHorNav2='';
  13.     var TickerHorForm='';
  14.     var TickerHorFormDiv='';
  15.     var NewFrame='';
  16.     var LiveRef='<BASE HREF="http://www.buana.com/content/">   \n';
  17.     TopPos=TopPos+30;
  18.     var strout="'out'";
  19.     var strover="'over'";
  20.  
  21.     TickerHor1   ='<HTML>   \n';
  22.     TickerHor1  +='<TITLE>Moving Ticker: CROSS BROWSER DHTML/JAVASCRIPT: VERSION 1.00</TITLE>   \n';   
  23.     TickerHor1  +='<HEAD>   \n';   
  24.     TickerHor1  +='<STYLE TYPE="text/css">   \n';   
  25.     TickerHor1  +='A:link    {text-decoration:none; font:12pt modern; color:red; font-weight:bold}   \n';   
  26.     TickerHor1  +='A:visited    {text-decoration:none; font:12pt modern; color:red; font-weight:bold}   \n';   
  27.     TickerHor1  +='A:active    {text-decoration:none; font:12pt modern; color:red; font-weight:bold}   \n';   
  28.     TickerHor1  +='BODY {background: url(../image/snm_bgsawo.jpg); background-position: -120 0;}   \n';   
  29.  
  30.     TickerHor1  +='#'+NameId+'    {position:absolute; background-color:rgb('+numred1+','+numgreen1+','+numblue1+'); clip:rect(0,'+TickWidth+','+TickHeight+',0); clip:rect("0,'+TickWidth+','+TickHeight+',0"); layer-background-color:rgb('+numred1+','+numgreen1+','+numblue1+'); width:800; height:'+TickHeight+'; LEFT:'+LeftPos+'; TOP:'+TopPos+';}   \n';   
  31.  
  32.  
  33.       for (var i = 1; i < NumbText+1; i++){
  34.  
  35.         TickerHor1  +='#'+NameId+''+i+'    {visibility:hidden; position:absolute; LEFT:0; TOP:0;}   \n'; 
  36.     }
  37.       for (var i = 1; i < NumbText+1; i++){
  38.         TickerHor1  +='P.Ft'+NameId+''+i+'   {font:'+ArrayFtSiz[i]+'pt '+ArrayFtFam[i]+'; color:rgb('+ArrayRed[i]+','+ArrayGre[i]+','+ArrayBlu[i]+'); font-weight:'+ArrayFtTyp1[i]+'; font-style:'+ArrayFtTyp2[i]+';}   \n';
  39.  
  40.     }
  41.  
  42.     TickerHor1  +='</STYLE>   \n';   
  43.     TickerHor1  +='<SCRIPT LANGUAGE="javascript" SRC="../jscripts/initv01.js"></SCRIPT>   \n';   
  44.     TickerHor1  +='<SCRIPT LANGUAGE="JavaScript" SRC="../jscripts/browser01.js"></SCRIPT>   \n';   
  45.     TickerHor1  +='<SCRIPT LANGUAGE="JavaScript" SRC="../jscripts/mvtickrightv02.js"></SCRIPT>   \n';   
  46.     TickerHor1  +='<SCRIPT LANGUAGE="JavaScript">   \n';   
  47.     TickerHor1  +='    var nbrowser=-1;   \n';   
  48.     TickerHor1  +='function check_browser(){    \n';  
  49.     TickerHor1  +='    get_browser();   \n';   
  50.     TickerHor1  +='    if (browser.name ==  "Microsoft Internet Explorer")   nbrowser=1;   \n';   
  51.     TickerHor1  +='    if (browser.name ==  "Navigator Netscape") nbrowser=0;   \n';   
  52.     TickerHor1  +='    mvtickerRight(nbrowser,"'+NameId+'",'+NumbText+',1,0,0,'+TickStep+','+LeftLimit+','+TickWidth+','+TickTime+');   \n';
  53.     TickerHor1  +='}   \n';  
  54.     TickerHor1  +='</SCRIPT>   \n';
  55.  
  56.     TickerHor2  +='</HEAD>   \n';   
  57.     TickerHor2  +='<BODY>   \n';   
  58.     TickerHor2  +='<DIV ID='+NameId+'>   \n';
  59.  
  60.       for (var i = 1; i < NumbText+1; i++){
  61.  
  62.         TickerHor2  +='    <DIV ID='+NameId+''+i+'><P CLASS=Ft'+NameId+''+i+'>'+textmessage[i]+'</P></DIV>   \n';
  63.  
  64.     }
  65.  
  66.  
  67.  
  68.     TickerHor2  +='</DIV>   \n';
  69.  
  70.     TickerHor3  +='</BODY>   \n';   
  71.     TickerHor3  +='</HTML>   \n';   
  72.     TickerHor3  +='<SCRIPT>var tc=check_browser();</SCRIPT>   \n'; 
  73.  
  74.  
  75.  
  76.     TickerHorSelect1  ='<SCRIPT LANGUAGE="JavaScript" SRC="../jscripts/objvisv01.js"></SCRIPT>  \n';
  77.     TickerHorSelect1 +='<SCRIPT LANGUAGE="javascript" SRC="../jscripts/liveim2v01.js"></SCRIPT>  \n';
  78.     TickerHorSelect1 +='<SCRIPT LANGUAGE="javascript">  \n';
  79.     TickerHorSelect1 +='//  \n';
  80.     TickerHorSelect1 +='// IMAGE SETUP FOR SELECTS BUTTON  \n';
  81.     TickerHorSelect1 +='//  \n';
  82.     TickerHorSelect1 +='SELECT1img1click = new Image();  \n';
  83.     TickerHorSelect1 +='SELECT1img1click.src = "../image/snm_code_click.gif";  \n';
  84.     TickerHorSelect1 +='SELECT1img1over = new Image();  \n';
  85.     TickerHorSelect1 +='SELECT1img1over.src = "../image/snm_code_over.gif";  \n';
  86.     TickerHorSelect1 +='SELECT1img1out = new Image();  \n';
  87.     TickerHorSelect1 +='SELECT1img1out.src = "../image/snm_code.gif";  \n';
  88.     TickerHorSelect1 +='//  \n';
  89.     TickerHorSelect1 +='SELECT2img2click = new Image();  \n';
  90.     TickerHorSelect1 +='SELECT2img2click.src = "../image/snm_preview_click.gif";  \n';
  91.     TickerHorSelect1 +='SELECT2img2over = new Image();  \n';
  92.     TickerHorSelect1 +='SELECT2img2over.src = "../image/snm_preview_over.gif";  \n';
  93.     TickerHorSelect1 +='SELECT2img2out = new Image();  \n';
  94.     TickerHorSelect1 +='SELECT2img2out.src = "../image/snm_preview.gif";  \n';
  95.     TickerHorSelect1 +='//  \n';
  96.     TickerHorSelect1 +='SELECT3img3click = new Image();  \n';
  97.     TickerHorSelect1 +='SELECT3img3click.src = "../image/snm_back_click.gif";  \n';
  98.     TickerHorSelect1 +='SELECT3img3over = new Image();  \n';
  99.     TickerHorSelect1 +='SELECT3img3over.src = "../image/snm_back_over.gif";  \n';
  100.     TickerHorSelect1 +='SELECT3img3out = new Image();  \n';
  101.     TickerHorSelect1 +='SELECT3img3out.src = "../image/snm_back.gif";  \n';
  102.     TickerHorSelect1 +='function select_over(k){  \n';
  103.     TickerHorSelect1 +='    ly1="SELECT";  \n';
  104.     TickerHorSelect1 +='    ly2="SELECT"+k;  \n';
  105.     TickerHorSelect1 +='    Img=ly2+"img";  \n';
  106.     TickerHorSelect1 +='    img_over2(nbrowser,ly1,ly2,Img,k);  \n';
  107.     TickerHorSelect1 +='}  \n';
  108.     TickerHorSelect1 +='function select_out(k){  \n';
  109.     TickerHorSelect1 +='    ly1="SELECT";  \n';
  110.     TickerHorSelect1 +='    ly2="SELECT"+k;  \n';
  111.     TickerHorSelect1 +='    Img=ly2+"img";  \n';
  112.     TickerHorSelect1 +='    img_out2(nbrowser,ly1,ly2,Img,k);  \n';
  113.     TickerHorSelect1 +='}  \n';
  114.     TickerHorSelect1 +='function select_click(k){  \n';
  115.     TickerHorSelect1 +='    ly1="SELECT";  \n';
  116.     TickerHorSelect1 +='    ly2="SELECT"+k;  \n';
  117.     TickerHorSelect1 +='    Img=ly2+"img";  \n';
  118.     TickerHorSelect1 +='    img_click2(nbrowser,ly1,ly2,Img,k);  \n';
  119.     TickerHorSelect1 +='    if (k==3) parent.frames[1].history.go(-1);   \n';
  120.     TickerHorSelect1 +='    if (k==1) Obj_Vis(nbrowser,1,"'+NameId+'","hidden");  \n';
  121.     TickerHorSelect1 +='    if (k==1) Obj_Vis(nbrowser,1,"SOURCE","inherit");  \n';
  122.  
  123.     TickerHorSelect1 +='    if (k==2) Obj_Vis(nbrowser,1,"SOURCE","hidden");  \n';
  124.     TickerHorSelect1 +='    if (k==2) Obj_Vis(nbrowser,1,"'+NameId+'","inherit");  \n';
  125.     TickerHorSelect1 +='}  \n';
  126.     TickerHorSelect1 +='</SCRIPT>  \n';
  127.     
  128.     TickerHorSelect2  ='<DIV ID=SELECT STYLE="position:absolute; left:10; top:0;">  \n';
  129.     TickerHorSelect2 +='    <DIV ID=SELECT1 STYLE="position:absolute; left:20; top:0;">  \n';
  130.     TickerHorSelect2 +='        <A HREF="javascript://"  \n';
  131.     TickerHorSelect2 +='        OnMouseOver="select_over(1)"  \n';
  132.     TickerHorSelect2 +='        OnMouseOut="select_out(1)"  \n';
  133.     TickerHorSelect2 +='        OnClick="select_click(1); return false;">  \n';
  134.     TickerHorSelect2 +='        <IMG BORDER=0 NAME=SELECT1img SRC="../image/snm_code.gif"></A>  \n';
  135.     TickerHorSelect2 +='    </DIV>  \n';
  136.     TickerHorSelect2 +='    <DIV ID=SELECT2 STYLE="position:absolute; left:120; top:0;">  \n';
  137.     TickerHorSelect2 +='        <A HREF="javascript://"  \n';
  138.     TickerHorSelect2 +='        OnMouseOver="select_over(2)"  \n';
  139.     TickerHorSelect2 +='        OnMouseOut="select_out(2)"  \n';
  140.     TickerHorSelect2 +='        OnClick="select_click(2); return false;">  \n';
  141.     TickerHorSelect2 +='        <IMG BORDER=0 NAME=SELECT2img SRC="../image/snm_preview.gif"></A>  \n';
  142.     TickerHorSelect2 +='    </DIV>  \n';
  143.     TickerHorSelect2 +='    <DIV ID=SELECT3 STYLE="position:absolute; left:220; top:0;">  \n';
  144.     TickerHorSelect2 +='        <A HREF="javascript://"  \n';
  145.     TickerHorSelect2 +='        OnMouseOver="select_over(3)"  \n';
  146.     TickerHorSelect2 +='        OnMouseOut="select_out(3)"  \n';
  147.     TickerHorSelect2 +='        OnClick="select_click(3); return false;">  \n';
  148.     TickerHorSelect2 +='        <IMG BORDER=0 NAME=SELECT3img SRC="../image/snm_back.gif"></A>  \n';
  149.     TickerHorSelect2 +='    </DIV>  \n';
  150.     TickerHorSelect2 +='</DIV>  \n';
  151.  
  152.  
  153.     screen_width();
  154.  
  155.     if (MyScreenWidth==800){
  156.         var MyRows=16;
  157.         var MyCols=50;
  158.     }else{
  159.         var MyRows=12;
  160.         var MyCols=38;
  161.     }
  162.  
  163.  
  164.     TickerHorForm  ='    <FORM NAME=test> \n';
  165.     TickerHorForm +='        <TEXTAREA NAME=test2 name=output  ROWS='+MyRows+' COLS='+MyCols+'> \n';
  166.     TickerHorForm +=LiveRef+TickerHor1+TickerHor2+TickerHor3;
  167.     TickerHorForm +='        </TEXTAREA> \n';
  168.     TickerHorForm +='    </FORM > \n';
  169.  
  170.     TickerHorFormDiv  ='<DIV ID=SOURCE STYLE="visibility:hidden; position:absolute; left:10; top:30;"> \n';
  171.     TickerHorFormDiv +=TickerHorForm;
  172.     TickerHorFormDiv +='</DIV> \n';
  173.  
  174.  
  175.  
  176.     if (signe_browser==1){
  177.  
  178.         TickerHor=TickerHor1+TickerHorSelect1+TickerHor2+TickerHorSelect2+TickerHorFormDiv+TickerHor3;
  179.         parent.frames[1].document.write(TickerHor);
  180.         parent.frames[1].document.close();
  181.  
  182.  
  183.     }
  184.  
  185.     if (signe_browser==0){
  186.  
  187.  
  188.         Obj_Vis(nbrowser,1,'CONTENT','hidden');
  189.         Obj_Vis(nbrowser,1,'TEXTPROP','hidden');
  190.  
  191.         document.SOURCE.document.open();
  192.         document.SOURCE.document.write(TickerHorForm);
  193.         document.SOURCE.document.close();
  194.  
  195.             var j0=jnav;
  196.         var NameIdNav='MyTickerNav'+j0;
  197.         jnav=jnav+1;
  198.         
  199.         
  200.         if (jnav >2)     mvtickerRightL2(0,j0,'false','PREVIEW',NameIdNav,NumbText,1,0,0,TickStep,LeftLimit,TickWidth,TickTime);   
  201.  
  202.         var NameIdNav='MyTickerNav'+jnav;
  203.  
  204.         TickerHorNav1  ='<LAYER ID='+NameIdNav+' CLIP="'+TickWidth+','+TickHeight+'" BGCOLOR="'+bgrgb+'" TOP=0 LEFT=0 WIDTH=800 HEIGHT='+TickHeight+'>';
  205.         for (var i = 1; i < NumbText+1; i++){
  206.             TickerHorNav1 +='    <DIV ID='+NameIdNav+''+i+' STYLE="visibility:hidden; position:absolute; LEFT:0; TOP:0;"><P CLASS=Ft'+NameId+''+i+' STYLE="font:'+ArrayFtSiz[i]+'pt '+ArrayFtFam[i]+'; color:rgb('+ArrayRed[i]+','+ArrayGre[i]+','+ArrayBlu[i]+'); font-weight:'+ArrayFtTyp1[i]+'; font-style:'+ArrayFtTyp2[i]+';">'+textmessage[i]+'</P></DIV>';
  207.         }
  208.         TickerHorNav1 +='</LAYER>';
  209.  
  210.  
  211.  
  212.  
  213.  
  214.         
  215.         document.PREVIEW.document.open();
  216.         document.PREVIEW.document.write(TickerHorNav1);
  217.         document.PREVIEW.document.close();
  218.         
  219.  
  220.  
  221.         window.scroll(0,0);
  222.  
  223.         Obj_Top(signe_browser,1,TopPos,"PREVIEW");  
  224.         Obj_Left(signe_browser,1,LeftPos,"PREVIEW"); 
  225.  
  226.  
  227.         Obj_Vis(nbrowser,1,'SELECT','inherit');
  228.         Obj_Vis(nbrowser,1,'PREVIEW','inherit');
  229.  
  230.         mvtickerRightL2(0,jnav,'true','PREVIEW',NameIdNav,NumbText,1,0,0,TickStep,LeftLimit,TickWidth,TickTime);   
  231.  
  232.     }
  233.  
  234. }
  235.